function [ s ] = sumForc( c )
%UNTITLED8 Summary of this function goes here
%   Detailed explanation goes here

% i cant make it not load the file every time...
x = load('tableData.dat');

Hnumerical = x(:,2) ./ 2;

o = optimset('MaxFunEvals',4000,'MaxIter',4000,'Display','off');

fun = @(x, xdata) fitFunctionForHVariable(x,xdata,c);
N = [2:65]';
x1 = lsqcurvefit(fun,[0,0,0,0,0,0],N,Hnumerical(1:64),[],[],o);
N = [2:65,70:5:200]';
x2 = lsqcurvefit(fun,[0,0,0,0,0,0],N,Hnumerical,[],[],o);
s = sum((x1-x2).^2);

end

